home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 90 / CD Actual 90.iso / Software3D / K-3D / k3d-0.4.2.1 / share / lsystem / trees3.ls < prev    next >
Encoding:
Text File  |  2004-07-23  |  327 b   |  23 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 14
  3. 20
  4. 50
  5. #
  6. c(12)&(90)H
  7. #
  8. H=g(4500)TH
  9. #
  10. T=[^(90)CCA]
  11. A=CBD>(94)CBD>(132)BD
  12. B=[&CDCD$A]
  13. D=[g(50)Lg(50)Lg(50)Lg(50)Lg(50)Lg(50)L]
  14. #
  15. C=!(.95)~(5)tF
  16. #
  17. F='(1.25)F'(.8)
  18. #
  19. L=[~f(200)c(8){+(30)f(200)-(120)f(200)-(120)f(200)}]
  20. f=z
  21. z=_
  22. @
  23.